home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BBS in a Box 7
/
BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso
/
Files
/
Hyper
/
M-Md
/
MacWedding.cpt
/
MacWedding™
/
HomeChurch
/
background_6869.txt
< prev
next >
Wrap
Text File
|
1992-09-15
|
26KB
|
1,279 lines
-- background: 6869 from stack: in
-- bmap block id: 7045
-- flags: 4000
-- background id: 0
-- name: VendorCard
-- part 1 (button)
-- low flags: 80
-- high flags: 2003
-- rect: left=65 top=283 right=336 bottom=110
-- title width / last selected line: 0
-- icon id / first selected line: 4895 / 4895
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Go Previous
----- HyperTalk script -----
on mouseUp
visual effect scroll up very fast to gray
visual effect scroll up very fast
go previous
end mouseUp
-- part 2 (button)
-- low flags: 00
-- high flags: 2003
-- rect: left=132 top=283 right=336 bottom=177
-- title width / last selected line: 0
-- icon id / first selected line: 6724 / 6724
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Go Next
----- HyperTalk script -----
on mouseUp
visual effect scroll down very fast to gray
visual effect scroll down very fast
go next
end mouseUp
-- part 3 (button)
-- low flags: 00
-- high flags: 2003
-- rect: left=199 top=283 right=336 bottom=244
-- title width / last selected line: 0
-- icon id / first selected line: 8538 / 8538
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Find
----- HyperTalk script -----
on mouseUp
beep
end mouseUp
-- part 4 (button)
-- low flags: 00
-- high flags: 2003
-- rect: left=266 top=283 right=336 bottom=311
-- title width / last selected line: 0
-- icon id / first selected line: 27713 / 27713
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Reports
----- HyperTalk script -----
on mouseUp
lock screen
push cd
Repeat with x = 19 to 25
show bkgnd btn x
end Repeat
unlock screen with dissolve
end mouseUp
-- part 5 (button)
-- low flags: 00
-- high flags: 2003
-- rect: left=333 top=283 right=336 bottom=378
-- title width / last selected line: 0
-- icon id / first selected line: 28646 / 28646
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Help
----- HyperTalk script -----
on mouseUp
lock screen
set the scroll of fld Help to 1
show fld Help
unlock screen with dissolve
end mouseUp
-- part 6 (button)
-- low flags: 00
-- high flags: 2003
-- rect: left=401 top=283 right=336 bottom=446
-- title width / last selected line: 0
-- icon id / first selected line: 11120 / 11120
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: HomeChurch
----- HyperTalk script -----
on mouseUp
visual effect venetian blinds to gray
visual effect venetian blinds
go first cd
end mouseUp
-- part 11 (button)
-- low flags: 00
-- high flags: 2003
-- rect: left=463 top=45 right=86 bottom=508
-- title width / last selected line: 0
-- icon id / first selected line: 10128 / 10128
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Guests
----- HyperTalk script -----
on mouseUp
visual effect iris open to gray
visual effect iris open
go cd 2 of bkgnd GuestCard of stack GuestCards
end mouseUp
-- part 12 (button)
-- low flags: 00
-- high flags: 2003
-- rect: left=463 top=88 right=129 bottom=508
-- title width / last selected line: 0
-- icon id / first selected line: 25740 / 25740
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Events
----- HyperTalk script -----
on mouseUp
visual effect iris open to gray
visual effect iris open
go cd Shower
end mouseUp
-- part 13 (button)
-- low flags: 00
-- high flags: 2003
-- rect: left=463 top=132 right=173 bottom=508
-- title width / last selected line: 0
-- icon id / first selected line: 18992 / 18992
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Budget
----- HyperTalk script -----
on mouseUp
visual effect iris open to gray
visual effect iris open
go cd Budget
end mouseUp
-- part 14 (button)
-- low flags: 00
-- high flags: 2003
-- rect: left=463 top=176 right=217 bottom=508
-- title width / last selected line: 0
-- icon id / first selected line: 10971 / 10971
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Checklists
----- HyperTalk script -----
on mouseUp
visual effect iris open to gray
visual effect iris open
go cd Checklist
end mouseUp
-- part 15 (button)
-- low flags: 00
-- high flags: 0003
-- rect: left=463 top=220 right=261 bottom=508
-- title width / last selected line: 0
-- icon id / first selected line: 29253 / 29253
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Vendors
----- HyperTalk script -----
on mouseUp
beep
end mouseUp
-- part 23 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=3 top=298 right=318 bottom=45
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 9
-- style flags: 8192
-- line height: 12
-- part name: DELETE
----- HyperTalk script -----
on mouseUp
beep
end mouseUp
-- part 26 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=2 top=318 right=339 bottom=44
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 9
-- style flags: 8192
-- line height: 12
-- part name: SORT
----- HyperTalk script -----
on mouseUp
beep
end mouseUp
-- part 25 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=467 top=298 right=337 bottom=509
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
beep
end mouseUp
-- part 27 (button)
-- low flags: 00
-- high flags: 0003
-- rect: left=65 top=283 right=336 bottom=110
-- title width / last selected line: 0
-- icon id / first selected line: 26950 / 26950
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Go Previous
----- HyperTalk script -----
on mouseUp
beep
end mouseUp
-- part 28 (button)
-- low flags: 00
-- high flags: 0003
-- rect: left=132 top=283 right=336 bottom=177
-- title width / last selected line: 0
-- icon id / first selected line: 26001 / 26001
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Go Next
----- HyperTalk script -----
on mouseUp
beep
end mouseUp
-- part 29 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=133 top=11 right=27 bottom=362
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 2
-- text size: 14
-- style flags: 256
-- line height: 18
-- part name: VENDOR CARD
-- part 31 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=100 top=50 right=65 bottom=305
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: VendorName
-- part 34 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=350 top=50 right=65 bottom=448
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: Category
-- part 44 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=100 top=65 right=93 bottom=448
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: Address
-- part 45 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=100 top=92 right=107 bottom=248
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: City
-- part 46 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=302 top=92 right=107 bottom=335
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: State
-- part 47 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=389 top=92 right=107 bottom=448
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: ZIP
-- part 49 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=100 top=111 right=126 bottom=191
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: MainPhone
-- part 50 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=224 top=111 right=126 bottom=315
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: DirectLine
-- part 54 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=357 top=111 right=126 bottom=448
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: FAXNumber
-- part 56 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=100 top=137 right=152 bottom=248
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: ContactName
-- part 57 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=100 top=151 right=166 bottom=248
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: ContactTitle
-- part 58 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=100 top=165 right=180 bottom=248
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: Salutation
-- part 65 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=305 top=137 right=152 bottom=448
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: Manager
-- part 136 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=305 top=165 right=180 bottom=448
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: Bookkeeper
-- part 137 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=100 top=191 right=206 bottom=248
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: RespParty
-- part 138 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=161 top=205 right=220 bottom=248
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: FirstContact
-- part 139 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=161 top=219 right=234 bottom=248
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: DueDate
-- part 140 (field)
-- low flags: 02
-- high flags: 4000
-- rect: left=161 top=233 right=248 bottom=248
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: DepositAmt
-- part 141 (field)
-- low flags: 02
-- high flags: 4007
-- rect: left=311 top=191 right=222 bottom=447
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 9
-- style flags: 0
-- line height: 10
-- part name: References
-- part 142 (field)
-- low flags: 02
-- high flags: 4007
-- rect: left=312 top=243 right=274 bottom=448
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 9
-- style flags: 0
-- line height: 10
-- part name: Reminders
-- part 143 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=40 top=187 right=207 bottom=101
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: RespParty
----- HyperTalk script -----
on mouseUp
lock screen
Repeat with x = 26 to 30
show bkgnd btn x
end Repeat
unlock screen
end mouseUp
-- part 144 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=304 top=53 right=69 bottom=351
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: RespParty
----- HyperTalk script -----
on mouseUp
lock screen
Repeat with x = 31 to 41
show bkgnd btn x
end Repeat
end mouseUp
on mouseUp
if fld Category is empty then
get location of fld Category
click at it
else
get location of fld Category
click at it
tabKey
end if
end mouseUp
-- part 147 (field)
-- low flags: 03
-- high flags: 0002
-- rect: left=349 top=226 right=241 bottom=389
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: RefCheck
----- HyperTalk script -----
on mouseUp
get fld refCheck
if it is "Yes" then put "No" into fld refCheck
if it is "No" then put "" into fld refCheck
if it is "" then put "Yes" into fld refCheck
end mouseUp
-- part 148 (field)
-- low flags: 81
-- high flags: 0007
-- rect: left=41 top=280 right=338 bottom=457
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 21
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: Help
----- HyperTalk script -----
on mouseUp
lock screen
hide fld Help
unlock screen with dissolve
end mouseUp
-- part 152 (button)
-- low flags: 80
-- high flags: 0004
-- rect: left=231 top=172 right=280 bottom=448
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:
-- part 153 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=236 top=177 right=198 bottom=442
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: 30 Day Reminder of Services
----- HyperTalk script -----
on mouseUp
beep
lock screen
Repeat with x = 19 to 24
hide bkgnd btn x
end Repeat
unlock screen with dissolve
end mouseUp
-- part 155 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=236 top=196 right=217 bottom=442
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Thank-You Letter
----- HyperTalk script -----
on mouseUp
beep
lock screen
Repeat with x = 19 to 24
hide bkgnd btn x
end Repeat
unlock screen with dissolve
end mouseUp
-- part 156 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=236 top=215 right=236 bottom=442
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Confirmation Letter
----- HyperTalk script -----
on mouseUp
beep
lock screen
Repeat with x = 19 to 24
hide bkgnd btn x
end Repeat
unlock screen with dissolve
end mouseUp
-- part 157 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=236 top=234 right=255 bottom=442
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Vendor Phonebook
----- HyperTalk script -----
on mouseUp
beep
lock screen
Repeat with x = 19 to 24
hide bkgnd btn x
end Repeat
unlock screen with dissolve
end mouseUp
-- part 158 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=236 top=253 right=274 bottom=442
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Vendor Report
----- HyperTalk script -----
on mouseUp
beep
lock screen
Repeat with x = 19 to 24
hide bkgnd btn x
end Repeat
unlock screen with dissolve
end mouseUp
-- part 159 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=266 top=284 right=335 bottom=311
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
lock screen
Repeat with x = 19 to 25
hide bkgnd btn x
end Repeat
unlock screen with dissolve
end mouseUp
-- part 160 (button)
-- low flags: 80
-- high flags: 0004
-- rect: left=42 top=136 right=188 bottom=143
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:
-- part 161 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=44 top=139 right=154 bottom=139
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Other
----- HyperTalk script -----
on mouseUp
lock screen
Repeat with x = 26 to 30
hide bkgnd btn x
end Repeat
put "" into line 1 of bkgnd fld "RespParty"
unlock screen
get location of fld RespParty
click at it
end mouseUp
-- part 166 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=44 top=152 right=169 bottom=139
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Groom's Family
----- HyperTalk script -----
on mouseUp
lock screen
Repeat with x = 26 to 30
hide bkgnd btn x
end Repeat
put "Groom's Family" into line 1 of bkgnd fld "RespParty"
unlock screen
get location of fld FirstContact
click at it
get location of fld FirstContact
click at it
end mouseUp
-- part 167 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=44 top=167 right=184 bottom=139
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Bride's Family
----- HyperTalk script -----
on mouseUp
lock screen
Repeat with x = 26 to 30
hide bkgnd btn x
end Repeat
put "Bride's Family" into line 1 of bkgnd fld "RespParty"
unlock screen
get location of fld FirstContact
click at it
end mouseUp
-- part 168 (button)
-- low flags: 80
-- high flags: 2000
-- rect: left=41 top=187 right=207 bottom=101
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
lock screen
Repeat with x = 26 to 30
hide bkgnd btn x
end Repeat
unlock screen
end mouseUp
-- part 169 (button)
-- low flags: 80
-- high flags: 0004
-- rect: left=304 top=68 right=211 bottom=405
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:
-- part 170 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=307 top=70 right=87 bottom=401
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Beverage
----- HyperTalk script -----
on mouseUp
lock screen
put "Beverage" into line 1 of bkgnd fld "Category"
Repeat with x = 31 to 41
hide bkgnd btn x
end Repeat
unlock screen
get location of fld Category
click at it
tabKey
end mouseUp
-- part 171 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=307 top=85 right=102 bottom=401
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Florist
----- HyperTalk script -----
on mouseUp
lock screen
put "Florist" into line 1 of bkgnd fld "Category"
Repeat with x = 31 to 41
hide bkgnd btn x
end Repeat
unlock screen
get location of fld Category
click at it
tabKey
end mouseUp
-- part 172 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=307 top=100 right=117 bottom=401
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Food
----- HyperTalk script -----
on mouseUp
lock screen
put "Food" into line 1 of bkgnd fld "Category"
Repeat with x = 31 to 41
hide bkgnd btn x
end Repeat
unlock screen
get location of fld Category
click at it
tabKey
end mouseUp
-- part 173 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=307 top=115 right=132 bottom=401
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Lighting
----- HyperTalk script -----
on mouseUp
lock screen
put "Lighting" into line 1 of bkgnd fld "Category"
Repeat with x = 31 to 41
hide bkgnd btn x
end Repeat
unlock screen
get location of fld Category
click at it
tabKey
end mouseUp
-- part 174 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=307 top=130 right=147 bottom=401
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Music
----- HyperTalk script -----
on mouseUp
lock screen
put "Music" into line 1 of bkgnd fld "Category"
Repeat with x = 31 to 41
hide bkgnd btn x
end Repeat
unlock screen
get location of fld Category
click at it
tabKey
end mouseUp
-- part 175 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=307 top=145 right=162 bottom=401
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Photography
----- HyperTalk script -----
on mouseUp
lock screen
put "Photography" into line 1 of bkgnd fld "Category"
Repeat with x = 31 to 41
hide bkgnd btn x
end Repeat
unlock screen
get location of fld Category
click at it
tabKey
end mouseUp
-- part 176 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=307 top=160 right=177 bottom=401
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Sound system
----- HyperTalk script -----
on mouseUp
lock screen
put "Sound System" into line 1 of bkgnd fld "Category"
Repeat with x = 31 to 41
hide bkgnd btn x
end Repeat
unlock screen
get location of fld Category
click at it
tabKey
end mouseUp
-- part 177 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=307 top=175 right=192 bottom=401
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Transportation
----- HyperTalk script -----
on mouseUp
lock screen
put "Transportation" into line 1 of bkgnd fld "Category"
Repeat with x = 31 to 41
hide bkgnd btn x
end Repeat
unlock screen
get location of fld Category
click at it
tabKey
end mouseUp
-- part 178 (button)
-- low flags: 80
-- high flags: A004
-- rect: left=307 top=190 right=207 bottom=401
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name: Other
----- HyperTalk script -----
on mouseUp
lock screen
put "" into line 1 of bkgnd fld "Category"
Repeat with x = 31 to 41
hide bkgnd btn x
end Repeat
unlock screen
get location of fld Category
click at it
get location of fld Category
click at it
tabKey
end mouseUp
-- part 179 (button)
-- low flags: 80
-- high flags: 2000
-- rect: left=304 top=53 right=69 bottom=351
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 8192
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
lock screen
Repeat with x = 31 to 41
hide bkgnd btn x
end Repeat
unlock screen
end mouseUp